home
***
CD-ROM
|
disk
|
FTP
|
other
***
search
/
Magnum One
/
Magnum One (Mid-American Digital) (Disc Manufacturing).iso
/
d13
/
pcrjan89.arc
/
GETDAY.SCR
< prev
next >
Wrap
Text File
|
1990-03-21
|
418b
|
12 lines
N GETDAY.COM ;Name program
A 100 ;Start assembly
MOV AH,2A ;DOS function: get date
INT 21 ;Call DOS (returns day of week in AL)
MOV AH,4C ;DOS function: terminate with return code
INT 21 ;Call DOS (with return code in AL)
RCX ;Set CX to write 8-byte file
8
W ;Write file to disk
Q ;Quit DEBUG